#Resolvendo o codigo  tudo
getwd()
getwd()
setwd("C:/Users/USER/Desktop/Geral/meteorology" )
getwd()
dir()
ls()
load("letras.rdata")
ls()
save.image()
pares<- c(2,4,6,8)
impares<-c(1,3,5,7,9)
todos.os.numeros<-c(pares,impares)
save.image("C:/Users/USER/Desktop/Geral/meteorology/2tuto.RData")
pares
ls()
ls()
a<-1
b<-a
a=1->b
A1<-c(1,2,3)
A2<-C(10,20,30)
A2<-C(10,20,30)
b<-c(A1,A2)
A2<-c(10,20,30)
b<-c(A1,A2)
ls()
ls()
ls(pattern="A")
a.1<-A1
a.2<-A2
ls()
rm(list=c("A1","A2"))
ls()
rm(list=c("A1","A2"))
rm(list=ls(pattern="A"))
ls()
rm(A1,A2)
ls()
ls()
copa.70<-"21/06/70"
copa.94<-"17/07/94"
copa.94-copa.70
copa.94-copa.70
class(copa.94)
class(copa.70)
copa.94-copa.70
class(copa.94)
class(copa.70)
copa.70<-as.Date(copa.70,format="%d/%m/%y")
copa.94<-as.Date(copa.94,format="%d/%m/%y")
copa.94-copa.70
herb<-c("A","M","M","A","A","M","M","B","A","A","A","B","A")
herb.f<-factor(herb)
(herb.f<-table(herb.f))
plot(herb.t)
plot(herb.f)
herb.f<-factor(herb,levels=c("N","B","M","A"))
plot(herb.f)
library()
search()
search()
x1<-rnorm(15,1,3)
hist(x1)
truehist(x1)
search()
library(MASS)
search()
truehist(x1)

#Qual o comando voc usou para mudar o diretrio de trabalho?
o comando  setwd()
#H um comando simples com a funo rm que apaga todos os objetos de sua rea de trabalho. Qual ?
rm()  o comando que apaga ou sair q
#Suponha que voc tenha digitado este comando. De que maneira poderia evitar a perda definitiva de todos os objetos apagados?
a maneira de evitar  rodando de novo o scripts j que o projeto nao  feito na console.


